
Partial Class Contact
    Inherits System.Web.UI.Page

    Protected Sub btnSend_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSend.Click
        Try
            Dim msg As New System.Net.Mail.MailMessage
            msg.From = New System.Net.Mail.MailAddress(txtEmail.Text)
            msg.To.Add(New System.Net.Mail.MailAddress(Globals.Settings.ContactForm.MailTo))
            msg.Subject = txtSubject.Text
            msg.Body = txtBody.Text
            Dim smtp As New System.Net.Mail.SmtpClient
            smtp.Send(msg)
            Server.Transfer("~/Confirmation.aspx?id=contact")
        Catch ex As Exception

        End Try
    End Sub
End Class
